****
* REPLICATION MATERIAL ARTICLE CHIARAMONTE EMANUELE, AND IMPROTA (ITALIAN POLITICAL SCIENCE REVIEW 2025) 'Party system types and the decline of systemness in Western Europe: are party system classifications still useful?'
****
use "C:\Users\vince\Dropbox\party system classification\Chiaramonte, Emanuele, and Improta IPSR 2025.dta", replace
//Figure 1 (and Table A3)
xtlogit nosystem ib1.decade i.cntry if decade < 7
margins ib1.decade
marginsplot, recast(bar) ytitle("Probability of party non-system predicted by the model") title ("") xtitle("") ylabel(0(0.1) 0.6)


//Figure 2
graph bar nosystem if decade>3, over(country_short, sort(nosystem)) ytitle("Share of 'Party non-system' legislatures after 1989") ylabel(0(0.1) 1)











